How Many Bugs in a Box/How Many Bugs in a Box.cdr/bugs/act1/00109.ls

Text File | 1995-04-03 | 437 b | 24 lines

on exitFrame
  global doneit, rewardnum, showing, backframe3
  if the soundBusy of 1 then
    go(the frame)
    exit
  end if
  if showing = 1 then
    go(backframe3)
    set showing to 0
    exit
  end if
  supuppet(38, 47)
  if count(doneit) < 1 then
    play frame "reward" & rewardnum
    set rewardnum to rewardnum + 1
    if rewardnum > 5 then
      set rewardnum to 1
    end if
    go("start")
    exit
  end if
  go("main")
end